home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Workbench Add-On
/
Workbench Add-On - Volume 1.iso
/
DiskUtil
/
Misc
/
DiskSpare
/
install.d
< prev
next >
Wrap
Text File
|
1995-11-24
|
2KB
|
89 lines
(if (= @language "deutsch")
(
(SET Intro "Wilkommen zum Installer-Script für die DiskSpare.Device")
(SET DDHD "Fuer welche Art von Diskettenlaufwerken wollen sie die Treiber anlegen ?")
(SET ChooseDrives "Bitte wählen sie die Laufwerke, für die sie Treiber anlegen möchten")
)
)
(COPYLIB
(SOURCE ":DiskUtil/Misc/DiskSpare/diskspare.device")
(DEST "devs:")
)
(SET WauWau
(ASKCHOICE
(PROMPT DDHD)
(HELP "")
(CHOICES
"HD-Drive"
"DD-Drive"
)
)
)
(SELECT WauWau
(
(SET Wuerg "HD")
)
(
(SET Wuerg "DD")
)
)
(if (EXISTS "devs:dosdrivers")
(
(SET #Drives
(ASKOPTIONS
(PROMPT ChooseDrives)
(HELP "")
(CHOICES
"DS0:"
"DS1:"
"DS2:"
"DS3:"
)
(DEFAULT 1)
)
)
(if (BITAND #DRIVES 1)
(COPYFILES
(SOURCE (cat ":DiskUtil/Misc/DiskSpare/"Wuerg"/DS0"))
(DEST "devs:dosdrivers")
)
)
(if (BITAND #DRIVES 2)
(COPYFILES
(SOURCE (cat ":DiskUtil/Misc/DiskSpare/"Wuerg"/DS1"))
(DEST "devs:dosdrivers")
)
)
(if (BITAND #DRIVES 4)
(COPYFILES
(SOURCE (cat ":DiskUtil/misc/DiskSpare/"Wuerg"/DS2"))
(DEST "devs:dosdrivers")
)
)
(if (BITAND #DRIVES 8)
(COPYFILES
(SOURCE (cat ":DiskUtil/misc/DiskSpare/"Wuerg"/DS3"))
(DEST "devs:dosdrivers")
)
)
)
(
(COPYFILES
(PROMPT (CAT :DiskUtil/misc/DiskSpare/#?))
(DEST "ram:")
)
)
)